home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 051-075 / disk_070 / logo / logo.2 < prev    next >
Text File  |  1992-05-06  |  309b  |  10 lines
  1. to poly1 :x :y :z fd :x lt :y poly1 :x+:z :y :z end
  2. to poly :x :y :z cs pd poly1 :x :y :z
  3. to demo 
  4.    print ['    Type in: ']
  5.    print ['         poly 3 145 3   ']
  6.    print ['to get the poly function. ']
  7.    print ['    Change the numbers and see what you get (especially']
  8.    print ['the middle one!)']  
  9. end
  10.